MODULE TEST;

VAR
    I : INTEGER;
    R : REAL;
    B : BOOLEAN;
    
BEGIN
	I := 2 + 1.5;
    I := (1 - 2) + (1 + 4) * 4 DIV 3 MOD 10; (* 5 *) 
    I := 1 + 2.5 - 1.4 * 2.1;  (* 0.56 FAIL *)
    R := 1 + 2.5 - 1.4 * 2.1; (* 0.56 *)

END TEST.